home *** CD-ROM | disk | FTP | other *** search
/ Amiga Tools 5 / Amiga Tools 5.iso / tools / developer-tools / e-tools / plugins / frumsplugs / install frumsplugs < prev    next >
Encoding:
Text File  |  1992-09-02  |  2.2 KB  |  101 lines
  1. ;------------------------------------------------------------------------
  2. ;
  3. ; Installer script for frumSPlugs
  4. ;
  5. ; $VER: Install frumSPlugs 1.0 (10.5.96)
  6. ;
  7. ; (C)1996 Stephen Sinclair
  8. ;
  9. ;------------------------------------------------------------------------
  10.  
  11. (onerror (CLEANUP))
  12.  
  13. ;------------------------------------------------------------------------
  14. (set @app-name "frumSPlugs")
  15.  
  16. ;------------------------------------------------------------------------
  17. (set #wrongversion "You need at least version 42.9 of Installer!")
  18. (set #welcome "Welcome to the installation of frumSPlugs!")
  19. (set #no-diskspace "You need more HD space.")
  20.  
  21. ;------------------------------------------------------------------------
  22. (procedure CLEANUP
  23.   (delete (tackon @default-dest ".tempinstall") (all) (optional "force"))
  24. ) ; CLEANUP
  25.  
  26. ;------------------------------------------------------------------------
  27.  
  28. (welcome #welcome)
  29. (complete 0)
  30.  
  31. (set moddir
  32.   (askdir
  33.     (prompt
  34.       (cat "Select a directory in which to install the Amiga E module files.  "
  35.            "A directory named 'Plugins' will be created there if it doesn't "
  36.            "exist already."))
  37.     (default "EModules:")
  38.     (help @askdir-help)
  39.   )
  40. )
  41.  
  42. (set plugdir (tackon moddir "Plugins"))
  43.  
  44. (if (= (exists plugdir) 0)
  45.   (makedir plugdir)
  46. )
  47.  
  48. (copyfiles
  49.   (prompt "Choose Plugin Modules to install:")
  50.   (help   @copyfiles-help)
  51.   (source "Modules/Plugins")
  52.   (dest   plugdir)
  53.   (all)
  54.   (confirm)
  55. )
  56.  
  57. (set docdir
  58.   (askdir
  59.     (prompt "Select directory for frumSPlugins.guide:")
  60.     (default "E:Docs")
  61.     (help @askdir-help)
  62.   )
  63. )
  64.  
  65. (copyfiles
  66.   (source "frumSPlugs.guide")
  67.   (dest   docdir)
  68.   (infos)
  69. )
  70.  
  71. (set instxpl
  72.   (askbool
  73.     (prompt "\n\n\nWould you like to install the examples?")
  74.     (default 1)
  75.     (choices "Yes" "No")
  76.     (help @askbool-help)
  77.   )
  78. )
  79.  
  80. (if instxpl
  81.   (
  82.     (set xpldir
  83.       (askdir
  84.         (prompt "Select directory for examples.  A drawer called 'PluginExamples' will be created there.")
  85.         (default "E:Src/Tools/EasyGUI")
  86.         (help @askdir-help)
  87.       )
  88.     )
  89.     (makedir (tackon xpldir "PluginExamples"))
  90.     (copyfiles
  91.       (source "Examples")
  92.       (dest   (tackon xpldir "PluginExamples"))
  93.       (all)
  94.     )
  95.   )
  96. )
  97.  
  98. (CLEANUP)
  99. (exit)
  100.  
  101.